home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / Programming / Source / winterp-1.13 / contrib / SunOS3.5-patch / patch next >
Encoding:
Text File  |  1991-10-06  |  3.1 KB  |  89 lines
  1. #
  2. # WINTERP Copyright 1989, 1990, 1991 Hewlett-Packard Company (by Niels Mayer).
  3. # XLISP version 2.1, Copyright (c) 1989, by David Betz.
  4. #
  5. # Permission to use, copy, modify, distribute, and sell this software and its
  6. # documentation for any purpose is hereby granted without fee, provided that
  7. # the above copyright notice appear in all copies and that both that
  8. # copyright notice and this permission notice appear in supporting
  9. # documentation, and that the name of Hewlett-Packard and David Betz not be
  10. # used in advertising or publicity pertaining to distribution of the software
  11. # without specific, written prior permission.  Hewlett-Packard and David Betz
  12. # make no representations about the suitability of this software for any
  13. # purpose. It is provided "as is" without express or implied warranty.
  14. #
  15.  
  16. *** winterp.c.orig    Thu Apr  4 08:05:24 1991
  17. --- winterp.c    Thu Apr  4 08:05:31 1991
  18. ***************
  19. *** 57,63 ****
  20.   #endif                /* WINTERP_WANT_INET_SERVER */
  21.   
  22.   #ifdef WINTERP_WANT_UNIX_SERVER
  23. ! #include <stdlib.h> /* for unlink() */
  24.   #include <sys/un.h> /* for AF_UNIX sockets */
  25.   #endif                /* WINTERP_WANT_UNIX_SERVER */
  26.   
  27. --- 57,63 ----
  28.   #endif                /* WINTERP_WANT_INET_SERVER */
  29.   
  30.   #ifdef WINTERP_WANT_UNIX_SERVER
  31. ! /* #include <stdlib.h>  for unlink() */
  32.   #include <sys/un.h> /* for AF_UNIX sockets */
  33.   #endif                /* WINTERP_WANT_UNIX_SERVER */
  34.   
  35. ***************
  36. *** 446,453 ****
  37.     root_win = DefaultRootWindow(display);
  38.     screen = DefaultScreenOfDisplay(display);
  39.     colormap = XDefaultColormapOfScreen(screen);
  40. -   wm_delete_atom = XmInternAtom(display, "WM_DELETE_WINDOW");
  41.   
  42.     /*
  43.      * Setup action table for accelerators and translations.
  44.      */
  45. --- 446,454 ----
  46.     root_win = DefaultRootWindow(display);
  47.     screen = DefaultScreenOfDisplay(display);
  48.     colormap = XDefaultColormapOfScreen(screen);
  49.   
  50. +   wm_delete_atom = XmInternAtom(display, "WM_DELETE_WINDOW", FALSE);
  51. + 
  52.     /*
  53.      * Setup action table for accelerators and translations.
  54.      */
  55. ***************
  56. *** 911,917 ****
  57.     int rdsock;
  58.     int addrlen = sizeof(struct sockaddr_in);
  59.     struct sockaddr_in peeraddr_in; /* for peer socket address */
  60. ! #ifdef hpux            
  61.     long lingerOpt = 1L;        /* NOTE: necessary while hpux-version < 8.0 (???) */
  62.   #else
  63.     struct linger lingerOpt;
  64. --- 914,920 ----
  65.     int rdsock;
  66.     int addrlen = sizeof(struct sockaddr_in);
  67.     struct sockaddr_in peeraddr_in; /* for peer socket address */
  68. ! #ifdef HACK
  69.     long lingerOpt = 1L;        /* NOTE: necessary while hpux-version < 8.0 (???) */
  70.   #else
  71.     struct linger lingerOpt;
  72. ***************
  73. *** 925,931 ****
  74.       xlfatal("Unable to accept() on INET Domain Socket."); /* CLEANUP & EXIT */
  75.     }
  76.     if (setsockopt(rdsock, SOL_SOCKET, SO_LINGER, (char *) &lingerOpt,
  77. ! #ifdef hpux
  78.            sizeof(long)    /* NOTE: necessary while hpux-version < 8.0 (???) */
  79.   #else
  80.            sizeof(struct linger)
  81. --- 928,934 ----
  82.       xlfatal("Unable to accept() on INET Domain Socket."); /* CLEANUP & EXIT */
  83.     }
  84.     if (setsockopt(rdsock, SOL_SOCKET, SO_LINGER, (char *) &lingerOpt,
  85. ! #ifdef HACK
  86.            sizeof(long)    /* NOTE: necessary while hpux-version < 8.0 (???) */
  87.   #else
  88.            sizeof(struct linger)
  89.